home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / graphics / sonota / a_terai / sa.tug < prev    next >
Text File  |  1993-07-08  |  945b  |  57 lines
  1. TUGi_macro( v1.0 )
  2. {
  3.     Screen( 3 ) ;
  4.     CLS( 1 ) ;
  5.     wind_init() ;
  6.     wrtstr(
  7.         "マウスをクリックして下さい。"
  8.     ) ;
  9.     paletteset() ;
  10.     mousewait() ;
  11.     wind_close() ;
  12.     Text_type(
  13.         SA.DOC
  14.     ) ;
  15.  
  16.     Screen( 3 ) ;
  17.     CLS( 1 ) ;
  18.     wind_init() ;
  19.     wrtstr(
  20.         "  では、グラフィックを見ていきましょう。"
  21.         "  グラフィックは、マウスを動かす事でスクロールし、"
  22.         "  左クリックで縮小、右クリックで拡大表示します。"
  23.         "  左右同時クリックで次のグラフィックに進めます。"
  24.         " "
  25.         "　マウスをクリックして下さい。"
  26.     ) ;
  27.     paletteset() ;
  28.     mousewait() ;
  29.     wind_close() ;
  30.     Gscroll( 1 ) ;
  31.     Graph_View(
  32.         SA001.TK4
  33.         SA002.TK4
  34.         SA003.TK4
  35.         SA004.TK4
  36.         SA005.TK4
  37.         SA006.TK4
  38.         SA007.TK4
  39.         SA008.TK4
  40.         SA009.TK4
  41.     )
  42.  
  43.     Screen( 3 ) ;
  44.     CLS( 1 ) ;
  45.     wind_init() ;
  46.     wrtstr(
  47.         "  これでおしまいです。"
  48.         " "
  49.         "  メニューに戻ります。"
  50.         " "
  51.         "　マウスをクリックして下さい。"
  52.     ) ;
  53.     paletteset() ;
  54.     mousewait( ) ;
  55.     wind_close() ;
  56. }
  57.